home *** CD-ROM | disk | FTP | other *** search
/ Ultimedia 1 / Ultimedia 1.iso / tools / soundtools / dasmodplayer / install-dasmp < prev    next >
Encoding:
Text File  |  1994-07-12  |  7.8 KB  |  342 lines
  1. ; This is installation script (V1.2) for D.A.S.ModulePlayer V3.2
  2.  
  3. (set daseplibsource "libs/dasmp")
  4. (set dasextarcsource "ENV/dasmp.extarc")
  5. (set dasauthorsource "ENV/dasmp.author")
  6. (set arexxsource    "rexx")
  7. (set #copying-eplib     "Copying External Player Libraries... ")
  8. (set #copying-exes      "Copying Executables and guide files... ")
  9. (set #copying-arexx     "Copying example arexx scripts...")
  10. (set #exists-extarc
  11. (cat    "dasmp.extarc was already found from your ENV: drawer "
  12.         "Would you like to overwrite it? This may destroy "
  13.         "previous settings you may have done for external archivers. "))
  14.         
  15. (set #copy-extarc       
  16. (cat    "Would you like to have an example external archiver "
  17.         "listfile copied to your ENV: and ENVARC:? This listing "
  18.         "is required if you want to use external archivers (such as LHA) "
  19.         "This example file includes examples for LHA and ZIP archivers. "))
  20. (set #copy-author
  21. (cat    "Would you like to have an example author listing "
  22.         "file copied to your ENV: and ENVARC:? "
  23.         "If you have your own author listing done this will "
  24.         "Overwrite it. This includes atleast the same as previous "
  25.         "example author files."))
  26.  
  27. (set #copy-magicwb
  28. (cat    "Would you like to have neat 8-color MAGIC WB "
  29.         "icons copied instead of those dull 4 color ones? "))
  30.  
  31. (set #scandir-do
  32. (cat    "Would you like to select directory which will "
  33.         "be scanned everytime you run D.A.S.MP? "
  34.         "This is a new feature in 3.2 release. "))
  35. (set #blaahlastwords
  36. (cat    "Now that you have installed D.A.S.MP: "
  37.         "(1). You MUST check DMAWait value in Config page 2. "
  38.         "Try different values. To a3000 or a4000 this should be "
  39.         "somewhere between 2000 and 3000. "
  40.         "(2). If you want to play other than PT/NT modules "
  41.         "You have to add appropriate EPL files to "
  42.         "External Player List in Config page 5. "
  43.         "Read the manual for more infomation. "))
  44.  
  45. (set #copy-arexx
  46. (cat    "Do you want to have example arexx script copied?"))
  47.  
  48. (set @default-dest
  49.     (askdir
  50.         (prompt "Please select directory to install D.A.S.MP into. ")
  51.     (help "You must select a directory into which D.A.S.ModulePlayer "
  52.     "will be installed. There should be around 300 KB space "
  53.     "available for full software installation. "
  54.     @askdir-help
  55.     )
  56.     (default "SYS:")
  57.     )
  58. )
  59.  
  60. (set @default-docdest
  61.     (askdir
  62.         (prompt "Please select directory to install Documents into. "
  63.         "Documents include: Dasmp.guide, Dasmp.guide.info. ")
  64.     (help "Dasmp.guide file will be copied to this destination "
  65.     @askdir-help
  66.     )
  67.     (default "SYS:")
  68.     )
  69. )
  70.  
  71.  
  72. (complete 5)
  73.  
  74. (copyfiles
  75.     (prompt "\n" #copying-exes)
  76.     (help "")
  77.     (source "dasmodplayer")
  78.     (dest @default-dest)
  79. )
  80. (copyfiles
  81.     (prompt "\n" #copying-exes)
  82.     (help "")
  83.     (source "converter")
  84.     (dest @default-dest)
  85.     (infos)
  86. )
  87.  
  88. (complete 25)
  89. (copyfiles
  90.     (prompt "\n" #copying-exes)
  91.     (help "")
  92.     (source "dasmp.guide")
  93.     (dest @default-docdest)    
  94.     (infos)
  95. )
  96. (set doregdoc (exists "l:dasmp.key"))
  97. (if (= doregdoc 0)
  98. (copyfiles
  99.     (prompt "\n" #copying-docs)
  100.     (help "")
  101.     (source "Register.doc")
  102.     (dest @default-dest)
  103.     (infos)
  104. ))
  105.  
  106. (set @default-ldest
  107.     (askdir
  108.         (prompt "Please select directory to install D.A.S.MP "
  109.         "External player libraries (EPL) into. ")
  110.     (help "You may select any directory you wish. To use these "
  111.         "External player libraries, you will have to add them "
  112.         "one by one from the D.A.S.MP itself. "
  113.     @askdir-help)
  114.     (default "LIBS:")
  115.     )
  116. )
  117. (complete 50)
  118. ;(copyfiles
  119. ;    (prompt "\n" #copying-eplib)
  120. ;    (help @copylib-help)
  121. ;    (source daseplibsource)
  122. ;    (dest @default-ldest)
  123. ;    (all)    
  124. ;)
  125.  
  126. ; EPL COPY ------------------------------------------------------
  127. (set tools
  128.     (askoptions
  129.         (prompt "Which EPLs you want to install?")
  130.         (help @askoptions-help)
  131.         (choices "S3M player" "MTM Player" "6-8 Channel mods" "QuadraComposer" "Future Composer" "(Octa)Med" "PT/NT FAST ram")
  132.     )
  133. )
  134.  
  135. (if (in tools 0)
  136. (
  137. (copyfiles
  138.  (prompt "\n" #copying-eplib)
  139.  (help @copylib-help)
  140.  (source "libs/dasmp/dasS3M0.library")
  141.  (dest @default-ldest)
  142. )
  143. ))
  144.  
  145. (if (in tools 1)
  146. (
  147. (copyfiles
  148.  (prompt "\n" #copying-eplib)
  149.  (help @copylib-help)
  150.  (source "libs/dasmp/dasMTM.library")
  151.  (dest @default-ldest)
  152. )
  153. ))
  154.  
  155. (if (in tools 2)
  156. (
  157. (copyfiles
  158.  (prompt "\n" #copying-eplib)
  159.  (help @copylib-help)
  160.  (source "libs/dasmp/das68CH.library")
  161.  (dest @default-ldest)
  162. )
  163. ))
  164. (if (in tools 3)
  165. (
  166. (copyfiles
  167.  (prompt "\n" #copying-eplib)
  168.  (help @copylib-help)
  169.  (source "libs/dasmp/dasQC20.library")
  170.  (dest @default-ldest)
  171. )
  172. ))
  173. (if (in tools 4)
  174. (
  175. (copyfiles
  176.  (prompt "\n" #copying-eplib)
  177.  (help @copylib-help)
  178.  (source "libs/dasmp/dasFC.library")
  179.  (dest @default-ldest)
  180. )
  181. ))
  182. (if (in tools 5)
  183. (
  184. (copyfiles
  185.  (prompt "\n" #copying-eplib)
  186.  (help @copylib-help)
  187.  (source "libs/dasmp/dasMMD0.library")
  188.  (dest @default-ldest)
  189. )
  190. ))
  191. (if (in tools 6)
  192. (
  193. (copyfiles
  194.  (prompt "\n" #copying-eplib)
  195.  (help @copylib-help)
  196.  (source "libs/dasmp/dasFAST.library")
  197.  (dest @default-ldest)
  198. )
  199. ))
  200.  
  201.  
  202. ; Example lists --------------------------------------------------------
  203.  
  204. (if
  205.     (askbool
  206.         (prompt #copy-extarc)
  207.         (help "")
  208.         (default 1)
  209.     )
  210.     (
  211.         (if (exists "ENV:dasmp.extarc")
  212.             (askbool
  213.                 (prompt #exists-extarc)
  214.                 (help "")
  215.                 (default 1)
  216.             )
  217.             (
  218.                 (copyfiles
  219.                 (source dasextarcsource)
  220.                 (dest "ENVARC:")        
  221.                 )
  222.                 (copyfiles
  223.                 (source dasextarcsource)
  224.                 (dest "ENV:")
  225.                 )
  226.             )
  227.     )
  228.     )
  229. )
  230. (if
  231.     (askbool
  232.         (prompt #copy-author)
  233.         (help "")
  234.         (default 1)
  235.     )
  236.     (
  237.     (copyfiles
  238.         (source dasauthorsource)
  239.         (dest "ENVARC:")    
  240.     )
  241.     (copyfiles
  242.         (source dasauthorsource)
  243.         (dest "ENV:")
  244.     )
  245.     )
  246. )
  247.  
  248. (complete 70)
  249.  
  250. (if
  251.     (askbool
  252.         (prompt #copy-arexx)
  253.         (help "")
  254.         (default 1)
  255.     )
  256.  
  257.     (           ; start of if statement
  258.       (set @default-rexxdest
  259.             (askdir
  260.             (prompt "Please select directory to install example "
  261.             "arexx scripts to. ")
  262.             (help @askdir-help)
  263.             (default "rexx:")
  264.             ))
  265.         (copyfiles
  266.             (prompt "\n" #copying-arexx)
  267.             (help "")
  268.             (source "rexx")
  269.             (dest @default-rexxdest)
  270.             (all)    
  271.     )))
  272. (set dasicon (tackon @default-dest "dasmodplayer.info"))
  273. (set doinfo (exists dasicon))
  274. (if (= doinfo 0)
  275. (
  276. (copyfiles
  277.     (prompt "\n" #copying-exes)
  278.     (help "")
  279.     (source "DMODPAPPICON.info")
  280.     (dest @default-dest)
  281. )
  282. (copyfiles
  283.     (prompt "\n" #copying-exes)
  284.     (help "")
  285.     (source "dasmodplayer.info")
  286.     (dest @default-dest)
  287. )
  288. (if
  289.     (askbool
  290.         (prompt #copy-magicwb)
  291.         (help "")
  292.         (default 1)
  293.     )
  294.     (
  295.     (copyfiles
  296.         (source "MagicWB-icons")
  297.         (dest @default-dest)
  298.         (all)
  299.     )
  300.     )
  301. ))
  302. )
  303. (if (exists "HELP:English")
  304.     (
  305.     (copyfiles
  306.         (source "Locale/help/English/dasmphelp.guide")
  307.         (dest "HELP:English")
  308.     )
  309.     (tooltype
  310.     (dest (tackon @default-dest "dasmodplayer"))
  311.     (help @tooltype-help)
  312.     (settooltype "ONLINEHELP" "HELP:English/dasmphelp.guide")
  313.     )
  314. ))
  315. (complete 90)
  316.  
  317. (if
  318.     (askbool
  319.         (prompt #scandir-do)
  320.         (help "")
  321.         (default 0)
  322.     )
  323.  
  324.     (           ; start of if statement
  325.       (set @default-scandest
  326.             (askdir
  327.             (prompt "Please select directory to scan. ")
  328.             (help @askdir-help)
  329.             (default "sys:")
  330.             ))
  331.  
  332.         (tooltype
  333.             (prompt "Setting scandir tooltype")
  334.             (dest (tackon @default-dest "dasmodplayer"))
  335.             (settooltype "SCANDIR" @default-scandest)
  336.  
  337.     )))
  338.  
  339.  
  340. (complete 100)
  341. (message #blaahlastwords)
  342.